\(\int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx\) [115]

Optimal result

Integrand size = 16, antiderivative size = 75 \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=-\frac {a^3 A}{6 x^6}-\frac {a^2 (3 A b+a B)}{5 x^5}-\frac {3 a b (A b+a B)}{4 x^4}-\frac {b^2 (A b+3 a B)}{3 x^3}-\frac {b^3 B}{2 x^2} \]

[Out]

-1/6*a^3*A/x^6-1/5*a^2*(3*A*b+B*a)/x^5-3/4*a*b*(A*b+B*a)/x^4-1/3*b^2*(A*b+3*B*a)/x^3-1/2*b^3*B/x^2

Rubi [A] (verified)

Time = 0.02 (sec) , antiderivative size = 75, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 1, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.062, Rules used = {77} \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=-\frac {a^3 A}{6 x^6}-\frac {a^2 (a B+3 A b)}{5 x^5}-\frac {b^2 (3 a B+A b)}{3 x^3}-\frac {3 a b (a B+A b)}{4 x^4}-\frac {b^3 B}{2 x^2} \]

[In]

Int[((a + b*x)^3*(A + B*x))/x^7,x]

[Out]

-1/6*(a^3*A)/x^6 - (a^2*(3*A*b + a*B))/(5*x^5) - (3*a*b*(A*b + a*B))/(4*x^4) - (b^2*(A*b + 3*a*B))/(3*x^3) - (
b^3*B)/(2*x^2)

Rule 77

Int[((d_.)*(x_))^(n_.)*((a_) + (b_.)*(x_))*((e_) + (f_.)*(x_))^(p_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*
x)*(d*x)^n*(e + f*x)^p, x], x] /; FreeQ[{a, b, d, e, f, n}, x] && IGtQ[p, 0] && (NeQ[n, -1] || EqQ[p, 1]) && N
eQ[b*e + a*f, 0] && ( !IntegerQ[n] || LtQ[9*p + 5*n, 0] || GeQ[n + p + 1, 0] || (GeQ[n + p + 2, 0] && Rational
Q[a, b, d, e, f])) && (NeQ[n + p + 3, 0] || EqQ[p, 1])

Rubi steps \begin{align*} \text {integral}& = \int \left (\frac {a^3 A}{x^7}+\frac {a^2 (3 A b+a B)}{x^6}+\frac {3 a b (A b+a B)}{x^5}+\frac {b^2 (A b+3 a B)}{x^4}+\frac {b^3 B}{x^3}\right ) \, dx \\ & = -\frac {a^3 A}{6 x^6}-\frac {a^2 (3 A b+a B)}{5 x^5}-\frac {3 a b (A b+a B)}{4 x^4}-\frac {b^2 (A b+3 a B)}{3 x^3}-\frac {b^3 B}{2 x^2} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.01 (sec) , antiderivative size = 69, normalized size of antiderivative = 0.92 \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=-\frac {10 b^3 x^3 (2 A+3 B x)+15 a b^2 x^2 (3 A+4 B x)+9 a^2 b x (4 A+5 B x)+2 a^3 (5 A+6 B x)}{60 x^6} \]

[In]

Integrate[((a + b*x)^3*(A + B*x))/x^7,x]

[Out]

-1/60*(10*b^3*x^3*(2*A + 3*B*x) + 15*a*b^2*x^2*(3*A + 4*B*x) + 9*a^2*b*x*(4*A + 5*B*x) + 2*a^3*(5*A + 6*B*x))/
x^6

Maple [A] (verified)

Time = 0.39 (sec) , antiderivative size = 66, normalized size of antiderivative = 0.88

method	result	size
default	\(-\frac {a^{3} A}{6 x^{6}}-\frac {a^{2} \left (3 A b +B a \right )}{5 x^{5}}-\frac {3 a b \left (A b +B a \right )}{4 x^{4}}-\frac {b^{2} \left (A b +3 B a \right )}{3 x^{3}}-\frac {b^{3} B}{2 x^{2}}\)	\(66\)
norman	\(\frac {-\frac {b^{3} B \,x^{4}}{2}+\left (-\frac {1}{3} b^{3} A -a \,b^{2} B \right ) x^{3}+\left (-\frac {3}{4} a \,b^{2} A -\frac {3}{4} a^{2} b B \right ) x^{2}+\left (-\frac {3}{5} a^{2} b A -\frac {1}{5} a^{3} B \right ) x -\frac {a^{3} A}{6}}{x^{6}}\)	\(74\)
risch	\(\frac {-\frac {b^{3} B \,x^{4}}{2}+\left (-\frac {1}{3} b^{3} A -a \,b^{2} B \right ) x^{3}+\left (-\frac {3}{4} a \,b^{2} A -\frac {3}{4} a^{2} b B \right ) x^{2}+\left (-\frac {3}{5} a^{2} b A -\frac {1}{5} a^{3} B \right ) x -\frac {a^{3} A}{6}}{x^{6}}\)	\(74\)
gosper	\(-\frac {30 b^{3} B \,x^{4}+20 A \,b^{3} x^{3}+60 B a \,b^{2} x^{3}+45 a A \,b^{2} x^{2}+45 B \,a^{2} b \,x^{2}+36 a^{2} A b x +12 a^{3} B x +10 a^{3} A}{60 x^{6}}\)	\(76\)
parallelrisch	\(-\frac {30 b^{3} B \,x^{4}+20 A \,b^{3} x^{3}+60 B a \,b^{2} x^{3}+45 a A \,b^{2} x^{2}+45 B \,a^{2} b \,x^{2}+36 a^{2} A b x +12 a^{3} B x +10 a^{3} A}{60 x^{6}}\)	\(76\)

[In]

int((b*x+a)^3*(B*x+A)/x^7,x,method=_RETURNVERBOSE)

[Out]

-1/6*a^3*A/x^6-1/5*a^2*(3*A*b+B*a)/x^5-3/4*a*b*(A*b+B*a)/x^4-1/3*b^2*(A*b+3*B*a)/x^3-1/2*b^3*B/x^2

Fricas [A] (verification not implemented)

none

Time = 0.22 (sec) , antiderivative size = 73, normalized size of antiderivative = 0.97 \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=-\frac {30 \, B b^{3} x^{4} + 10 \, A a^{3} + 20 \, {\left (3 \, B a b^{2} + A b^{3}\right )} x^{3} + 45 \, {\left (B a^{2} b + A a b^{2}\right )} x^{2} + 12 \, {\left (B a^{3} + 3 \, A a^{2} b\right )} x}{60 \, x^{6}} \]

[In]

integrate((b*x+a)^3*(B*x+A)/x^7,x, algorithm="fricas")

[Out]

-1/60*(30*B*b^3*x^4 + 10*A*a^3 + 20*(3*B*a*b^2 + A*b^3)*x^3 + 45*(B*a^2*b + A*a*b^2)*x^2 + 12*(B*a^3 + 3*A*a^2
*b)*x)/x^6

Sympy [A] (verification not implemented)

Time = 0.85 (sec) , antiderivative size = 82, normalized size of antiderivative = 1.09 \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=\frac {- 10 A a^{3} - 30 B b^{3} x^{4} + x^{3} \left (- 20 A b^{3} - 60 B a b^{2}\right ) + x^{2} \left (- 45 A a b^{2} - 45 B a^{2} b\right ) + x \left (- 36 A a^{2} b - 12 B a^{3}\right )}{60 x^{6}} \]

[In]

integrate((b*x+a)**3*(B*x+A)/x**7,x)

[Out]

(-10*A*a**3 - 30*B*b**3*x**4 + x**3*(-20*A*b**3 - 60*B*a*b**2) + x**2*(-45*A*a*b**2 - 45*B*a**2*b) + x*(-36*A*
a**2*b - 12*B*a**3))/(60*x**6)

Maxima [A] (verification not implemented)

none

Time = 0.18 (sec) , antiderivative size = 73, normalized size of antiderivative = 0.97 \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=-\frac {30 \, B b^{3} x^{4} + 10 \, A a^{3} + 20 \, {\left (3 \, B a b^{2} + A b^{3}\right )} x^{3} + 45 \, {\left (B a^{2} b + A a b^{2}\right )} x^{2} + 12 \, {\left (B a^{3} + 3 \, A a^{2} b\right )} x}{60 \, x^{6}} \]

[In]

integrate((b*x+a)^3*(B*x+A)/x^7,x, algorithm="maxima")

[Out]

-1/60*(30*B*b^3*x^4 + 10*A*a^3 + 20*(3*B*a*b^2 + A*b^3)*x^3 + 45*(B*a^2*b + A*a*b^2)*x^2 + 12*(B*a^3 + 3*A*a^2
*b)*x)/x^6

Giac [A] (verification not implemented)

none

Time = 0.29 (sec) , antiderivative size = 75, normalized size of antiderivative = 1.00 \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=-\frac {30 \, B b^{3} x^{4} + 60 \, B a b^{2} x^{3} + 20 \, A b^{3} x^{3} + 45 \, B a^{2} b x^{2} + 45 \, A a b^{2} x^{2} + 12 \, B a^{3} x + 36 \, A a^{2} b x + 10 \, A a^{3}}{60 \, x^{6}} \]

[In]

integrate((b*x+a)^3*(B*x+A)/x^7,x, algorithm="giac")

[Out]

-1/60*(30*B*b^3*x^4 + 60*B*a*b^2*x^3 + 20*A*b^3*x^3 + 45*B*a^2*b*x^2 + 45*A*a*b^2*x^2 + 12*B*a^3*x + 36*A*a^2*
b*x + 10*A*a^3)/x^6

Mupad [B] (verification not implemented)

Time = 0.05 (sec) , antiderivative size = 73, normalized size of antiderivative = 0.97 \[ \int \frac {(a+b x)^3 (A+B x)}{x^7} \, dx=-\frac {x^2\,\left (\frac {3\,B\,a^2\,b}{4}+\frac {3\,A\,a\,b^2}{4}\right )+x\,\left (\frac {B\,a^3}{5}+\frac {3\,A\,b\,a^2}{5}\right )+\frac {A\,a^3}{6}+x^3\,\left (\frac {A\,b^3}{3}+B\,a\,b^2\right )+\frac {B\,b^3\,x^4}{2}}{x^6} \]

[In]

int(((A + B*x)*(a + b*x)^3)/x^7,x)

[Out]

-(x^2*((3*A*a*b^2)/4 + (3*B*a^2*b)/4) + x*((B*a^3)/5 + (3*A*a^2*b)/5) + (A*a^3)/6 + x^3*((A*b^3)/3 + B*a*b^2)
+ (B*b^3*x^4)/2)/x^6